object LabelForm: TLabelForm Left = 366 Top = 204 Width = 808 Height = 796 HorzScrollBar.Range = 1200 VertScrollBar.Range = 2000 BorderStyle = bsDialog Caption = 'LabelForm' Font.Color = clBlack Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] PixelsPerInch = 96 TextHeight = 14 object QRBand1: TQRBand Left = 0 Top = 22 Width = 1200 Height = 71 Align = alTop BandType = rbDetail Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrInchesHV object QRDBText1: TQRDBText Left = 14 Top = 6 width = 203 height = 13 DataSource = DataSource1 DataField = 'Company' end object QRDBText2: TQRDBText Left = 14 Top = 19 width = 216 height = 13 DataSource = DataSource1 DataField = 'Addr1' end object QRDBText4: TQRDBText Left = 14 Top = 45 width = 216 height = 13 Color = clWhite DataSource = DataSource1 DataField = 'AdrLine4' end object QRDBText3: TQRDBText Left = 14 Top = 32 width = 219 height = 13 DataSource = DataSource1 DataField = 'AdrLine3' end end object QRBand2: TQRBand Left = 0 Top = 0 Width = 1200 Height = 22 Align = alTop BandType = rbPageHeader Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrNone object QRLabel1: TQRLabel Left = 11 Top = 3 width = 218 height = 15 Alignment = taCenter Caption = 'QuickReport mailing label demo report' AlignToBand = True Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] end object QRSysData1: TQRSysData Left = 644 Top = 4 width = 65 height = 17 Alignment = taRightJustify AlignToBand = True AutoSize = False Data = qrsPageNumber Text = 'Page ' end end object QRBand3: TQRBand Left = 0 Top = 93 Width = 1200 Height = 612 Align = alTop BandType = rbOverlay Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrNone object QRLabel2: TQRLabel Left = 24 Top = 348 width = 704 height = 114 Alignment = taCenter Caption = 'QuickReport' AlignToBand = True Font.Color = clBlack Font.Height = -107 Font.Name = 'Courier New' Font.Style = [] Transparent = True end object QRLabel3: TQRLabel Left = 24 Top = 464 width = 256 height = 114 Alignment = taCenter Caption = 'demo' AlignToBand = True Font.Color = clBlack Font.Height = -107 Font.Name = 'Courier New' Font.Style = [] Transparent = True end end object Table1: TTable Active = True OnCalcFields = Table1CalcFields DatabaseName = 'DBDEMOS' TableName = 'CUSTOMER.DB' Left = 35 Top = 100 object Table1CustNo: TFloatField FieldName = 'CustNo' end object Table1Company: TStringField FieldName = 'Company' Size = 30 end object Table1Addr1: TStringField FieldName = 'Addr1' Size = 30 end object Table1Addr2: TStringField FieldName = 'Addr2' Size = 30 end object Table1City: TStringField FieldName = 'City' Size = 15 end object Table1State: TStringField FieldName = 'State' end object Table1Zip: TStringField FieldName = 'Zip' Size = 10 end object Table1Country: TStringField FieldName = 'Country' end object Table1Phone: TStringField FieldName = 'Phone' Size = 15 end object Table1FAX: TStringField FieldName = 'FAX' Size = 15 end object Table1TaxRate: TFloatField FieldName = 'TaxRate' end object Table1Contact: TStringField FieldName = 'Contact' end object Table1LastInvoiceDate: TDateTimeField FieldName = 'LastInvoiceDate' end object Table1AdrLine3: TStringField Calculated = True FieldName = 'AdrLine3' Size = 30 end object Table1AdrLine4: TStringField Calculated = True FieldName = 'AdrLine4' Size = 30 end end object DataSource1: TDataSource DataSet = Table1 Left = 67 Top = 100 end object Rep: TQuickReport DataSource = DataSource1 ColumnMarginInches = 0 ColumnMarginMM = 0 Columns = 3 DisplayPrintDialog = False LeftMarginInches = 0 LeftMarginMM = 0 Orientation = poPortrait PrintOrder = qrColByCol ReportTitle = 'QuickReport mailing label demonstration' RestartData = True SQLCompatible = False TitleBeforeHeader = False Left = 3 Top = 100 end end